Imports System
Imports System.Collections.Generic
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Animation
Imports System.Windows.Media.Imaging
Imports System.Windows.Navigation
Imports System.Windows.Shapes
Imports OMANE.Common.UI
Imports ICSharpCode.AvalonEdit.Highlighting
Imports System.CodeDom.Compiler
Imports System.Linq.Expressions
Imports System.Data
Imports OMANE.Modules.Builder.MSFunctions
Imports OMANE.Modules.Builder.MSExpression
Imports ICSharpCode.AvalonEdit.CodeCompletion
Imports System.ComponentModel

Public Class MSProperty
    Inherits MSExpression

    Public func As Func(Of String)
    Dim _Owner As MSTable
    Dim _Name As String

    Public ReadOnly Property Owner As MSTable
        Get
            Return _Owner
        End Get
    End Property
    Public ReadOnly Property Name As String
        Get
            Return _Name
        End Get
    End Property
    Sub New()

    End Sub
    Sub New(ByVal owner As MSTable, ByVal name As String)
        Me._Owner = owner
        Me._Name = name
        Sources = New MSTable() {_Owner}

        func = Function() owner.Name & "." & name
        FuncStr = "{0}"
        Parameters = New Func(Of String)() {func}
    End Sub


End Class

Public Class MSProperty(Of T)
    Inherits MSProperty


End Class